home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload Trio 2 / Shareware Overload Trio Volume 2 (Chestnut CD-ROM).ISO / dir39 / arconv01.zip / TO2.DAT < prev    next >
Text File  |  1993-06-30  |  371b  |  12 lines
  1. if errorlevel 1 goto error
  2.  
  3. :: Statistics:
  4. echo Old archive (%RUN) size is: %@FILESIZE[..\%RUN]
  5. set NEW=%@FILESIZE[%FILENAME.%ARC]
  6. set OLD=%@FILESIZE[..\%RUN]
  7. echo New archive (%FILENAME.%ARC) size is: %NEW
  8. set DIV=%@EVAL[%NEW / %OLD]
  9. color cyan on black
  10. echo Gained %@EVAL[%OLD - %NEW] - New/old ratio: %DIV (%@EVAL[-100 * (%DIV - 1)]%%)
  11. color white on black
  12.